home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Amiga Classic Collection
/
The Amiga Classic Collection - Disc 2.iso
/
Klondike
/
K100a-.dms
/
K100a-.adf
/
Install
< prev
next >
Wrap
Text File
|
1992-12-29
|
4KB
|
186 lines
(complete 0)
(set default_lang 4)
(set #bad-kick
(cat "You must be using Kickstart 3.0 to install this game"
))
(set #which-disk
(cat "In which partition should the game be installed?"
))
(set #which-disk-help
(cat "\nThis section lets you choose on which hard drive partition the "
"Game files will be installed. "
@askdir-help
))
;=============================================================================
; make sure we are running under V39
(if (< (/ (getversion) 65536) 39)
(
(abort #bad-kick)
))
(user 0)
(welcome)
(set old_level @user-level)
;=============================================================================
; get the version from medplayer.library currently installed
(if (= (exists "Libs:medplayer.library") 1)
(
(protect "Libs:medplayer.library" "+rwed")
)
)
(copylib
(prompt ("Copying %s to %s" "REKO01:libs/medplayer.library" "Libs:"))
(help copyLibFileHelp
"\n"
"If you already have a copy of this library in the selected destination directory, the library "
"included on the distribution disk will be compared to the one you "
"already have. If your current library is an old version, the newer "
"version will be installed.\n"
"\n"
@copylib-help
)
(source "REKO01:libs/medplayer.library")
(dest "Libs:")
(confirm)
)
(complete 5)
;=============================================================================
; get target directory where game is to be installed
(set old_wb ("SYS:"))
(user 2)
(set target (askdir (prompt #which-disk)
(help #which-disk-help)
(default "")
(disk)
))
(user old_level)
(makedir (tackon target "REKO-Productions"))
(set wtarget target)
(copyfiles (source "REKO01:REKO.infa")
(dest wtarget)
)
(rename (tackon wtarget "REKO.infa") (tackon wtarget "REKO-Productions.info"))
(set target (tackon target "REKO-Productions"))
(set @default-dest target)
(set wtarget target)
;=============================================================================
; Put REKOCHARS in Fonts: directory
(copyfiles (source "REKO01:FONTS")
(dest "FONTS:")
(pattern "REKO#?")
)
;=============================================================================
; Put REKO command in C: directory
(copyfiles (source "REKO01:C/REKO")
(dest "C:")
)
;=============================================================================
; make some new drawers
(makedir (tackon wtarget "PICS"))
(makedir (tackon wtarget "MUSIC"))
(makedir (tackon wtarget "CARDS"))
(copyfiles (source "REKO01:REKO.infa")
(dest wtarget)
)
(rename (tackon wtarget "REKO.infa") (tackon wtarget "MAKE-CARDS.info"))
(copyfiles (source "REKO01:Klondike-Deluxe-AGA.info")
(dest wtarget)
)
(copyfiles (source "REKO01:Klondike-Deluxe-AGA.HD")
(dest wtarget)
)
(rename (tackon wtarget "Klondike-Deluxe-AGA.HD") (tackon wtarget "Klondike-Deluxe-AGA"))
(copyfiles (source "REKO01:REKO.Prefs.HD")
(dest wtarget)
)
(rename (tackon wtarget "REKO.Prefs.HD") (tackon wtarget "REKO.Prefs"))
(complete 10)
(copyfiles (source "REKO01:Intro.MUSX")
(dest (tackon wtarget "MUSIC"))
)
(complete 20)
(copyfiles (source "REKO01:Intro.REKO")
(dest (tackon wtarget "PICS"))
)
(complete 30)
(copyfiles (source "REKO01:")
(dest wtarget)
(pattern "REKO.Docs#?")
)
(complete 31)
(copyfiles (source "REKO01:FullView")
(dest wtarget)
)
(complete 32)
(copyfiles (source "REKO01:")
(dest wtarget)
(pattern "REKO.QRCard#?")
)
(complete 33)
(copyfiles (source "REKO02:Default.REKO")
(dest (tackon wtarget "CARDS"))
)
(complete 66)
(copyfiles (source "REKO03:")
(dest wtarget)
(pattern "MAKE#?")
)
(complete 70)
(copyfiles (source "REKO03:Default.MUSX")
(dest (tackon wtarget "MUSIC"))
)
(complete 80)
(copyfiles (source "REKO03:Default.WINM")
(dest (tackon wtarget "MUSIC"))
)
(complete 90)
(copyfiles (source "REKO03:Default.WINP")
(dest (tackon wtarget "PICS"))
)
(complete 100)